<%
/*
 *	Encrypt Module v0.1
 *	of SmartASP Library v0.2
 *
 *	http://code.google.com/p/smartasp/
 *
 *	Copyright (c) 2009-2010 heero
 *	licensed under MIT license
 *
 *	Date: 2009/11/26
 */


(function() {

/// 加密命名空间
$.encrypt = {

	/// MD5加密
	/// @param {String} 明文
	/// @param {Number} 密文长度，16或32，默认为32
	/// @return {String} 十六进制形式的密文
	toMd5 : function(s, len) {
		var temp = binlToHex(core_md5(strToBinl(s), s.length * chrsz));
		return 16 == len ? temp.substr(8, 16) : temp;
	},
	
	/// SHA1加密
	/// @param {String} 明文
	/// @return {String} 十六进制形式的密文
	toSha1 : function(s) {
		return binbToHex(core_sha1(strToBinb(s), s.length * chrsz));
	}
};


var chrsz = 8;  // 每个字符的位数: 8 - ASCII, 16 - Unicode

function safe_add(x, y) {
	var lsw = (x & 0xFFFF) + (y & 0xFFFF), msw = (x >> 16) + (y >> 16) + (lsw >> 16);
	return (msw << 16) | (lsw & 0xFFFF);
}
function bit_rol(num, cnt) {
	return (num << cnt) | (num >>> (32 - cnt));
}


// ----------------------------------------------------------------
// SHA1

function core_sha1(x, len) {
	x[len >> 5] |= 0x80 << (24 - len % 32);
	x[((len + 64 >> 9) << 4) + 15] = len;
	
	var w = Array(80),
		a = 1732584193, b = -271733879, c = -1732584194, d = 271733878, e = -1009589776,
		olda, oldb, oldc, oldd, olde,
		i = 0, j, len = x.length, t;
	
	for (; i < len; i += 16) {
		olda = a;
		oldb = b;
		oldc = c;
		oldd = d;
		olde = e;
	
		for (j = 0; j < 80; j++) {
			if (j < 16) {
				w[j] = x[i + j];
			} else {
				w[j] = bit_rol(w[j-3] ^ w[j-8] ^ w[j-14] ^ w[j-16], 1);
			}
			t = safe_add(safe_add(bit_rol(a, 5), sha1_ft(j, b, c, d)), safe_add(safe_add(e, w[j]), sha1_kt(j)));
			e = d;
			d = c;
			c = bit_rol(b, 30);
			b = a;
			a = t;
		}
	
		a = safe_add(a, olda);
		b = safe_add(b, oldb);
		c = safe_add(c, oldc);
		d = safe_add(d, oldd);
		e = safe_add(e, olde);
	}
	
	return [a, b, c, d, e];
}

function sha1_ft(t, b, c, d) {
	if (t < 20) { return (b & c) | ((~b) & d); }
	if (t < 40) { return b ^ c ^ d; }
	if (t < 60) { return (b & c) | (b & d) | (c & d); }
	return b ^ c ^ d;
}
function sha1_kt(t) {
	return (t < 20) ? 1518500249 : (t < 40) ? 1859775393 :
			 (t < 60) ? -1894007588 : -899497514;
}

function binbToHex(binArray) {
	var hexTab =  "0123456789abcdef", str = [], i = -1, len = binArray.length * 4;
	while (++i < len) {
		str[i] = hexTab.charAt((binArray[i >> 2] >> ((3 - i % 4) * 8 + 4)) & 0xF) + hexTab.charAt((binArray[i >> 2] >> ((3 - i % 4) * 8)) & 0xF);
	}
	return str.join("");
}
function strToBinb(str) {
	var bin = [], mask = (1 << chrsz) - 1, i = 0, len = str.length * chrsz;
	for (; i < len; i += chrsz) {
		bin[i >> 5] |= (str.charCodeAt(i / chrsz) & mask) << (32 - chrsz - i % 32);
	}
	return bin;
}

// ---------------------------------------------------------------- */


// ----------------------------------------------------------------
// MD5

function core_md5(x, len) {
	x[len >> 5] |= 0x80 << ((len) % 32);
	x[(((len + 64) >>> 9) << 4) + 14] = len;
	
	var a = 1732584193, b = -271733879, c = -1732584194, d = 271733878, i = 0, len = x.length,
		olda, oldb, oldc, oldd;
	
	for (; i < len; i += 16) {
		olda = a, oldb = b, oldc = c, oldd = d;
	
		a = md5_ff(a, b, c, d, x[i + 0], 7 , -680876936);
		d = md5_ff(d, a, b, c, x[i + 1], 12, -389564586);
		c = md5_ff(c, d, a, b, x[i + 2], 17, 606105819);
		b = md5_ff(b, c, d, a, x[i + 3], 22, -1044525330);
		a = md5_ff(a, b, c, d, x[i + 4], 7 , -176418897);
		d = md5_ff(d, a, b, c, x[i + 5], 12, 1200080426);
		c = md5_ff(c, d, a, b, x[i + 6], 17, -1473231341);
		b = md5_ff(b, c, d, a, x[i + 7], 22, -45705983);
		a = md5_ff(a, b, c, d, x[i + 8], 7 , 1770035416);
		d = md5_ff(d, a, b, c, x[i + 9], 12, -1958414417);
		c = md5_ff(c, d, a, b, x[i + 10], 17, -42063);
		b = md5_ff(b, c, d, a, x[i + 11], 22, -1990404162);
	
		a = md5_ff(a, b, c, d, x[i + 12], 7 , 1804603682);
		d = md5_ff(d, a, b, c, x[i + 13], 12, -40341101);
		c = md5_ff(c, d, a, b, x[i + 14], 17, -1502002290);
		b = md5_ff(b, c, d, a, x[i + 15], 22, 1236535329);
	
		a = md5_gg(a, b, c, d, x[i + 1], 5 , -165796510);
		d = md5_gg(d, a, b, c, x[i + 6], 9 , -1069501632);
		c = md5_gg(c, d, a, b, x[i +11], 14, 643717713);
		b = md5_gg(b, c, d, a, x[i + 0], 20, -373897302);
		a = md5_gg(a, b, c, d, x[i + 5], 5 , -701558691);
		d = md5_gg(d, a, b, c, x[i + 10], 9 , 38016083);
		c = md5_gg(c, d, a, b, x[i + 15], 14, -660478335);
		b = md5_gg(b, c, d, a, x[i + 4], 20, -405537848);
		a = md5_gg(a, b, c, d, x[i + 9], 5 , 568446438);
		d = md5_gg(d, a, b, c, x[i + 14], 9 , -1019803690);
		c = md5_gg(c, d, a, b, x[i + 3], 14, -187363961);
		b = md5_gg(b, c, d, a, x[i + 8], 20, 1163531501);
		a = md5_gg(a, b, c, d, x[i + 13], 5 , -1444681467);
		d = md5_gg(d, a, b, c, x[i + 2], 9 , -51403784);
		c = md5_gg(c, d, a, b, x[i + 7], 14, 1735328473);
		b = md5_gg(b, c, d, a, x[i + 12], 20, -1926607734);
	
		a = md5_hh(a, b, c, d, x[i + 5], 4 , -378558);
		d = md5_hh(d, a, b, c, x[i + 8], 11, -2022574463);
		c = md5_hh(c, d, a, b, x[i +11], 16, 1839030562);
		b = md5_hh(b, c, d, a, x[i +14], 23, -35309556);
		a = md5_hh(a, b, c, d, x[i + 1], 4 , -1530992060);
		d = md5_hh(d, a, b, c, x[i + 4], 11, 1272893353);
		c = md5_hh(c, d, a, b, x[i + 7], 16, -155497632);
		b = md5_hh(b, c, d, a, x[i +10], 23, -1094730640);
		a = md5_hh(a, b, c, d, x[i +13], 4 , 681279174);
		d = md5_hh(d, a, b, c, x[i + 0], 11, -358537222);
		c = md5_hh(c, d, a, b, x[i + 3], 16, -722521979);
		b = md5_hh(b, c, d, a, x[i + 6], 23, 76029189);
		a = md5_hh(a, b, c, d, x[i + 9], 4 , -640364487);
		d = md5_hh(d, a, b, c, x[i + 12], 11, -421815835);
		c = md5_hh(c, d, a, b, x[i + 15], 16, 530742520);
		b = md5_hh(b, c, d, a, x[i + 2], 23, -995338651);
	
		a = md5_ii(a, b, c, d, x[i + 0], 6 , -198630844);
		d = md5_ii(d, a, b, c, x[i + 7], 10, 1126891415);
		c = md5_ii(c, d, a, b, x[i + 14], 15, -1416354905);
		b = md5_ii(b, c, d, a, x[i + 5], 21, -57434055);
		a = md5_ii(a, b, c, d, x[i + 12], 6 , 1700485571);
		d = md5_ii(d, a, b, c, x[i + 3], 10, -1894986606);
		c = md5_ii(c, d, a, b, x[i + 10], 15, -1051523);
		b = md5_ii(b, c, d, a, x[i + 1], 21, -2054922799);
		a = md5_ii(a, b, c, d, x[i + 8], 6 , 1873313359);
		d = md5_ii(d, a, b, c, x[i + 15], 10, -30611744);
		c = md5_ii(c, d, a, b, x[i + 6], 15, -1560198380);
		b = md5_ii(b, c, d, a, x[i + 13], 21, 1309151649);
		a = md5_ii(a, b, c, d, x[i + 4], 6 , -145523070);
		d = md5_ii(d, a, b, c, x[i + 11], 10, -1120210379);
		c = md5_ii(c, d, a, b, x[i + 2], 15, 718787259);
		b = md5_ii(b, c, d, a, x[i + 9], 21, -343485551);
	
		a = safe_add(a, olda);
		b = safe_add(b, oldb);
		c = safe_add(c, oldc);
		d = safe_add(d, oldd);
	}
	
	return [a, b, c, d];
}

function binlToHex(binArray) {
	var hexTab = "0123456789abcdef", str = [], i = -1, len = binArray.length * 4;
	while (++i < len) {
		str[i] = hexTab.charAt((binArray[i >> 2] >> ((i % 4) * 8 + 4)) & 0xF) + hexTab.charAt((binArray[i >> 2] >> ((i % 4) * 8)) & 0xF);
	}
	return str.join("");
}
function strToBinl(str) {
	var bin = [], mask = (1 << chrsz) - 1, i = 0, len = str.length * chrsz;
	for (; i < len; i += chrsz) {
		bin[i >> 5] |= (str.charCodeAt(i / chrsz) & mask) << (i % 32);
	}
	return bin;
}

function md5_cmn(q, a, b, x, s, t) {
	return safe_add(bit_rol(safe_add(safe_add(a, q), safe_add(x, t)), s),b);
}
function md5_ff(a, b, c, d, x, s, t) {
	return md5_cmn((b & c) | ((~b) & d), a, b, x, s, t);
}
function md5_gg(a, b, c, d, x, s, t) {
	return md5_cmn((b & d) | (c & (~d)), a, b, x, s, t);
}
function md5_hh(a, b, c, d, x, s, t) {
	return md5_cmn(b ^ c ^ d, a, b, x, s, t);
}
function md5_ii(a, b, c, d, x, s, t) {
	return md5_cmn(c ^ (b | (~d)), a, b, x, s, t);
}

// ---------------------------------------------------------------- */

})();
%>